home *** CD-ROM | disk | FTP | other *** search
/ IRIX 6.2 Development Libraries / SGI IRIX 6.2 Development Libraries.iso / dist / complib.idb / usr / share / catman / p_man / cat3 / complib / crot.z / crot
Text File  |  1996-03-14  |  2KB  |  67 lines
  1.  
  2.  
  3.  
  4. CCCCRRRROOOOTTTT((((3333FFFF))))                                                              CCCCRRRROOOOTTTT((((3333FFFF))))
  5.  
  6.  
  7.  
  8. NNNNAAAAMMMMEEEE
  9.      CROT - applie a plane rotation, where the cos (C) is real and the sin (S)
  10.      is complex, and the vectors CX and CY are complex
  11.  
  12. SSSSYYYYNNNNOOOOPPPPSSSSIIIISSSS
  13.      SUBROUTINE CROT( N, CX, INCX, CY, INCY, C, S )
  14.  
  15.          INTEGER      INCX, INCY, N
  16.  
  17.          REAL         C
  18.  
  19.          COMPLEX      S
  20.  
  21.          COMPLEX      CX( * ), CY( * )
  22.  
  23. PPPPUUUURRRRPPPPOOOOSSSSEEEE
  24.      CROT   applies a plane rotation, where the cos (C) is real and the sin
  25.      (S) is complex, and the vectors CX and CY are complex.
  26.  
  27.  
  28. AAAARRRRGGGGUUUUMMMMEEEENNNNTTTTSSSS
  29.      N       (input) INTEGER
  30.              The number of elements in the vectors CX and CY.
  31.  
  32.      CX      (input/output) COMPLEX array, dimension (N)
  33.              On input, the vector X.  On output, CX is overwritten with C*X +
  34.              S*Y.
  35.  
  36.      INCX    (input) INTEGER
  37.              The increment between successive values of CY.  INCX <> 0.
  38.  
  39.      CY      (input/output) COMPLEX array, dimension (N)
  40.              On input, the vector Y.  On output, CY is overwritten with
  41.              -CONJG(S)*X + C*Y.
  42.  
  43.      INCY    (input) INTEGER
  44.              The increment between successive values of CY.  INCX <> 0.
  45.  
  46.      C       (input) REAL
  47.              S       (input) COMPLEX C and S define a rotation [  C          S
  48.              ] [ -conjg(S)   C  ] where C*C + S*CONJG(S) = 1.0.
  49.  
  50.  
  51.  
  52.  
  53.  
  54.  
  55.  
  56.  
  57.  
  58.  
  59.  
  60.  
  61.  
  62.  
  63.                                                                         PPPPaaaaggggeeee 1111
  64.  
  65.  
  66.  
  67.